home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / cgazv5n4.arc / METAFILE.C < prev    next >
C/C++ Source or Header  |  1991-09-23  |  4KB  |  127 lines
  1. /*--- Listing 2 -------------------------- METAFILE.C -----------
  2. * 
  3. * Author:  Gary A. Parker
  4. * Last update: 3-12-91
  5. * Compilers: Turbo C++ 1.0, MSC 6.0
  6. * Memory model: any
  7. *
  8. * A demonstration program for the metaphone().
  9. * The program will search a drive for a filename
  10. * which sounds similar to the name passed.
  11. *
  12. * This code is hereby placed in the public domain.
  13. *--------------------------------------------------------------*/
  14.  
  15. #include <stdio.h>
  16. #include <stdlib.h>
  17. #include <string.h>
  18. #include <dos.h>
  19.  
  20. #if defined(__TURBOC__)          /* Turboc C */
  21.     #include <dir.h>
  22. typedef struct ffblk   FILEINFO;
  23.     #define F_FIRST(a,b,c) findfirst(a,c,b)
  24.     #define F_NEXT         findnext
  25.     #define F_ATTRIB       ff_attrib
  26.     #define F_DATE         ff_fdate
  27.     #define F_SIZE         ff_fsize
  28.     #define F_NAME         ff_name
  29. #else
  30. typedef struct find_t  FILEINFO; /* MSC      */
  31.     #define F_FIRST        _dos_findfirst
  32.     #define F_NEXT         _dos_findnext
  33.     #define F_ATTRIB       attrib
  34.     #define F_DATE         wr_date
  35.     #define F_SIZE         size
  36.     #define F_NAME         name
  37. #endif
  38.  
  39. /* file attributes */
  40. #define RDONLY   0x01 /* Read only file */
  41. #define HIDDEN   0x02 /* Hidden file */
  42. #define SYSTEM   0x04 /* System file */
  43. #define SUBDIR   0x10 /* Subdirectory */
  44. #define ARCH     0x20 /* Archive file */
  45.  
  46. /* display the file and path if it matches  */
  47. void print_find_t(char *dir, FILEINFO *find);
  48.  
  49. /* perform metaphone comparison */
  50. int metaphone(char *name, char *m, int first);
  51.  
  52. /* search dos file system recursively */
  53. void search(char *dir, char *name);
  54.  
  55. int found = 0;
  56. char meta[8]; /* storage for first metaph */
  57.  
  58. main(int argc, char *argv[])
  59. {
  60.     char *ptr;
  61.  
  62.     if(argc == 1) {
  63.         puts("syntax metaph [filename]");
  64.         exit(1);
  65.     }
  66.     /* remove extension if any */
  67.     if((ptr = memchr(argv[1], '.', 9)) != 0) *ptr = 0;
  68.     metaphone(argv[1], meta, 1); /* store the metaph */
  69.     printf("\nmetaph for %s is %s\n", argv[1], meta);
  70.     search("", "");              /* search for matchs */
  71.     if(!found) printf("A match was not found\n");
  72.     return 0;
  73. }
  74.  
  75. void search(char *dir, char *newdir)
  76. {
  77.     char curdir[80];
  78.     FILEINFO find;
  79.     char *ptr;
  80.  
  81.     strcpy(curdir, dir); /* build first pathname */
  82.     strcat(curdir, newdir);
  83.     strcat(curdir, "\\*.*");
  84.  
  85.     /* check first file */
  86.     if( !F_FIRST( curdir, 0xFF, &find) ) {
  87.         curdir[strlen(curdir) - 3] = 0; /* remove *.* */
  88.         do  {
  89.             if(find.F_NAME[0] == '.') continue;
  90.             else{                       /* skip extension */
  91.                 if((ptr = memchr(find.F_NAME, '.', 9)) != 0)
  92.                     *ptr = 0;
  93.  
  94.                 /* call metaphone with flag set to
  95.                    0 to compare string with stored
  96.                    metaph */
  97.  
  98.                 if(metaphone(find.F_NAME, meta, 0) == 0) { 
  99.                     /* put back extension */
  100.                     if(ptr != 0) *ptr = '.';
  101.                     print_find_t(curdir, &find);
  102.                 }
  103.             }
  104.  
  105.             if((find.F_ATTRIB & SUBDIR))
  106.                 search(curdir, find.F_NAME); /* recursion */
  107.         } while( !F_NEXT( &find ) );
  108.     }
  109. }
  110.  
  111. /* display the file information */
  112. void print_find_t(char *dir, FILEINFO *find)
  113. {
  114.     printf("%s%-12s %8ld %2.2d-%02.2d-%02.2d %c%c%c%c%c\r\n",
  115.         dir, find->F_NAME, find->F_SIZE,
  116.         (find->F_DATE >> 5) & 0x0f,
  117.         find->F_DATE & 0x1f,
  118.         ((find->F_DATE >> 9) + 80) % 100,
  119.         (find->F_ATTRIB & SUBDIR) ? 'D' : '.',
  120.         (find->F_ATTRIB & RDONLY) ? 'R' : '.',
  121.         (find->F_ATTRIB & HIDDEN) ? 'H' : '.',
  122.         (find->F_ATTRIB & SYSTEM) ? 'S' : '.',
  123.         (find->F_ATTRIB & ARCH)   ? 'A' : '.' );
  124.  
  125.     found = 1;
  126. }
  127.